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H. BASIC 

EDIT rlinenumber) Enter edit. ccaWkand ieode f 

( SPACE l Advance the edit pointer 3 

C<ne« charecter> Change the next character in the edit buffer 3 

D Delete the next character 4 

Knew charactera> Insert new characters into the line 4 

L List the line in the special editing buffer 4 

8<character> Search to a specified character 4 

K<character> Delete to a specified character 4 

(RETURN) Replace line in file and exit edit ieode 4.1 

Q Quit the edit aodet leave original line unchanged 4.1 

RENUM Ketarting no.>) [ <incra*ent> ] ( <start line>1 Renumber file lines 4.1 

MERGE "l<umit>il<fllename>* Merge program on disk line by line into current file 4.3 
DELETE (l<linahumber>J-[<linenumber)] J Delete lines frosi current program 4.6 

LIST H41inen«edjer>)-(<linenustoet> j j Display some or all of current prograe 4.6 

RUN Execute prograe currently in prograe buffer 6 

(control- )C Interrupt a running prograe 7 

COW? i, Continue executing a n interrupted tffO.TRae 7 


(-]<n«..n) 1 Integer fotiiat 9 
(-] <n. . .n.n. ..n> Real forest 9 
"<characters>* String forest tfl 
<one letter)% Integer variable 4b 
<oa* letter)* String v 


(-) <xxRn. . .n> Integer in Radi X xx 9 
J-J<n...n.n...nE(-)xx Scientific foiest 9 

<one letter) (tone digit) 7 Real variable 10 


+ Addition 
\ Integer divieion 
< Leas thsn 
<~ Less thsn 
or equal to 
AND logical AND 




- Siibtr 
s Exponentiation 
) Greater than 
>=* Greater than or 
equal to 

OR loglgAl ML , TU 


Hon 1 


x and y stand for numeric expr eie Id hi t 
ABS(x) Absolute value 

COS(x) Cosine of angle in f a4l4ns 

FIX(x) Truncate fractional part 

INT(x) Greatest integer not greater Span 
LQG(x) Logarithm to Base ID 

»TN(x,y) Leaser of the two valties 

RND(x) Random number using x da Seed 
SIN(x) Sine of angle in tadiene 

tan ( x ) Tangent .in 

x, y and n stand for numeric dxpif actions » 
ASCfx?) ASCII code of riret ohefc. in «$ 
CHARS ( x ) Character whose ASCII code Is x 
FMT(x,y$) Give x as a string modeling y$ 
NON PRINTING CHARACTERS IN y«l 

9 digit) leading 0's become 1, 0* , e 
Z digit! leading 0'a become blanks 
V decimal point location 
$ digit! print $ where appropriate 
* digit! leading 0*8 become ***** 

, gives a blank, *, or 4 da nieded 
INDIA < AMI Igal tlqn _ Ip x* 

____ * Input from 1/Spofc t "x 

PEBK(x) Content b of memory l^pateten x 


Multiplication 
+ String concatenation 
* Equal to 
<> Wot equal to * 


ATW(x) Arctangent in radians 
i*XP(x) ExponSn tiafciOA 
rRAC ( x ) Fractional part 
LN(x) Logarithm to Satie e 
MAX(x,y) Greatest of the t ysloea 
M0D(x,y) x m6d\itb ,y 
SGN(x) +t if pos e / -1 if nege^ 6 if 0 
5QR(X) Squirt lfeot 


and y$ stand for string expffessiona. 
hX¥*T$(x$ ,n) n leftmost characters of x$ 
UfN ( x$ ) Length of *$ 

tflD$ (x$,n, tyl ) y charge of xi beg At rt*th 
MAX(x$,y$) The greater (by A&2II coda) 
Miw(x$ r y$) The lesser (by ASGlt code) 
RKPRAT${x$,n) x$ repeated n times 

RIGHT* (x$,n) n rightmost characters of x$ 
8TR$(n) n converted to i string 

VAL (x$) x$ converted to a ftimiber 

VBKlFY(x$ f y9 ) Poa dt first eftat not in y$ 

tilffiEii&te — ~ 

PghSIZE Siee of current program in bytes 
SbACBterr Bytes left in program buffer 


bATA <numeric Ur string constant),. 
DIF FH*letter>t(<per*meter name))! 
DBF FA<letter> » < Start addrdsa) 
DIM <Utter>{%) (<siee> , .. Kelso) ) 


.7 Date Bo be Assigned to variables by a READ 36 
{expression) User defined function 37 

Assembly lang. function 37 
Bibbs of 1 to 4 dimensions in array <l«tter) 38 


DIM <letter)$ < (<air#>, . .. ) <le»gth> ) Sires of 0 to 4 dim's 6 length of string array 38 
BHD , physical and of program fils 38 
EXEC {string expression) Execute shriiig expression as a BASIC statement 39 


EXEC {string expression) Execute shrMIfr expression as a BASIC statement 39 

FLOW Enable trace mode (display esdh program 11ns tdien executed) 39 

FOR <num. var.) - <num. expr. > TO <nu>. expr.) (STEP <hum. expr.)) Initiate loop 40 
GOSUB <linenumbar> Execute subroutine 42 

GOTO <linenumber> Transfer control 43 

IF <logioal expression) THEN <iinemsaber> Conditional transfer of control 43 

IF <log. expr.) (THEN) STATEMENT ( i STATEMENT) onnd.it ion a 1 execution of statements 43 
INPUT I*<prompt)"<i or ,)J <vsrlable) ( .variable ] . u Wait for input from console 44 

(LET) <variable> - <axpresslon> Assign vilue of {expression) to <variable> 44 

MBIEMD <numerlo expression) Define Upper limit of memory used by M. BASIC 45 

NEXT <numeric variable) Terminate loop begun by FDR and increment counter 45 

NOP LOW Disable trace mode 45 

ON <ntaa. expr.) <G0T0 or GOSUB) <llneno,> ( ,<linenoi>) . . . Variable transfer of control 45 
OUT ( <port, number) ) • <num. expr) output to port 46 

POKE ( taddreaa) ) - <numi expr.) Store In given memory address 46 

PRINT <expr.)(<, or |)}..rtTAB(<<num. expr.))(<, or i)]|... Display values 47 

READ {variable) [, {variable) .. . Give variablefi) valoe(s) found in DATA statement 49 

RBI {remark text) Non-axeevlted remark for documanbation purposes 49 

RfcSTORi t<linenumbsr> ) Position BATA list pointer 49 

RETORN Ratn&K from subroutine to calling routine 49 

SIXES ({raise), {isise), {seise), ( <prog.4i*e>J] Allocate number of bytes of storage SO 

STOP 8id#» pebyr^ execution! continue with CONT 50 

NO . --sat ring delimiter)* . .. ♦‘tfiiifti ftfflinihir f— INPUT and GET statement 




({unit) ()&*** bidpiay directory of disk in drive 53 

LORD " 1 <unlt> i j {filename) * Load program or object file into memory 53 

PL0ABG *t<uhl t> i ) <f ilenastS)* Load and execute program file 53 

SAVE ’ (Si ) ( <uni t> 1 ! <flleaiae)‘ i { <start4’ddft.A,y4i(i!iH«abf)1 Save file on disk 54 


SCRATGti "(runit)) ) ffllmneme)" 

OlttTN “ ( <unlt> t ] <filenam67 “ 

LINK * ( rtHit) i ) <f ilename)* 

OPEN <f ilehuabeU-) > Hfe>»4<«W*t> i ) <f ilenaW^V 


PUT <fl'len umber) [RB88PD <recinum*>) - 4|U|$)l 
GST <fil«nUMber> «rM4rtln«>] <»xfiri 

GLOBE <£ilenumb4t> 

ATTRS f^fileno*))-«tUi 16 (p rUg), 6 .(&> 

EOF ( <filenumb4r> ) - <filt length) 

FREEST AGE <f llenUmbet) D4^i 

GBTSBEk ( it ilemSabat) ) - «new GET pointer,) 
FUTEiMi (<fileHumber*>) - <new POT points^ 


Delete any file from disk 544 
; i)5(^l' atd execute next program segmen t 54.1 
^7-. bead and execute overlay file 544 
Cline poo) (ERROR Cline no.)) 

• • frk.--, ■ *Seh diet i!ile for program access 55 

store date on disk 57 
xpr)'L.ii4)b<e^pt:N . • • Get dkba from disk 60 

. r- , Jti ' ■ Close file 60 

tmrite protl) File attributes 61 
it ^ He t file length parameter 61 

D4->4lio£4,^>^ilfiiised tracks allocated to a file 62 
.ef> Set sequential Get pointer 62 

6^S_ Set sequential PUT pointer 62 

.**i chBoao pab* of 


MTS ( <f liOno) ) Attribute parameter RBSpllT (,<f llind) ) Val of sSq PUT pointer 
ERR Error code of last disk aBkbf KM Leno) ) File else in records 
ERRS Error message of last disk error TRiali ( fflleno) ) Number of tracks 
NAME (tMleno)) NX ike of the flit EOftETR Kfileno ) > Number of free tracks 


OPEN ffteh»Biir>*<*P,‘T,6r *«)• tPttUpftR lines)] tENDPAGEIllne number)) 

Open oukjNt Ol'le on printer, terminal, or null device 65 
Ptff <filenwbar> <expr>(<, pr »>]».. Output to printer or terminal 66 
CLOSE <filenumber) Close file 66 
BHDPAGB <f ilenumber) Position output device to top of next page 67 
MdldN < device •) <logioal Stream mask) (< width) (iftttii count) ) ] I/O control 67 
LfSrP [ ( <linnmimbar) )-[<linenumber>'! ) Seme er all of durrent program 69 
PAGESliSE tnumbef oi lines per page) ,v . Wft'.iiEm of pr«<j§*4 listing ptgdi 69 



CORF (atari blk 1> (end blk )•> <atart 
DUMP (start) (kend>l 
RNTR (start) 

riLI. <atart> (end) kbyte) 

HOVE kaource start) < source end) (destination) 
SEAR <atart> (end) kbyte) 


Compare two blocks of data 
Hex dump of amatory 
Enter data in aleatory 
Fill block of ateinory with a constant 
Hove a block of memory 
Search a block for a particular byte 


SEARN < start) <end> kbyte) Search a block for non occurrence of a byte 

CREATE " i <unit> i ) (filename)* ( (Mistype) 1 New directory entry is created 

WSF " (kuni t> i ) <f i lenama)* ((record qu||i)er>] Hex <ji»P »t file on disk 

FILES Kunit)] Output fonaattad display of disk directory 

FREE [kunit> ] Output ths nuatbar of free traske 

SCRATCH "(kunit)! Jkfiienaiae)" Remove s named file from the disk directory 

LOAD "(kunit) 1 1 <£ ilenaate)* [ kstajtfe»j toad a named file from disk 

SAVE " ( kunit) i J kf ilename)" kftart) <*nd) ((file type)) ( kexec.addr.)] Save new file 
RENAME " (kunit) : ) kf ilenaate)"' "knfw fRia>' Change the neae of a diak file 

TYPE “( kunit) s ) (filename)* Change the fils type on the directory 

APE ["(ASCII)* "(ASCII)"] {^t)$x) ) Trana far progrma control to MOO 

ASSIGN k device I) klogical stpgfm *■>);> (ikyidth) fknull count))) I/O control 

EXEC kaddress) Execute object code 

MATH (hex number) (hex nuatbar* Do hex arithmetic 

PROMPT "(ASCII)" Ghgfige thg prompt string to an arbitrary string 

INST kunit) tnltlaiixe a diskette in the indicated unit 

ZSM "[(unit) i ) kaouEoefile)" "( kgljjeqtf lie)" "(options)* ((offset)) Afpeebla 
OPTIONS! s (only errors) ’ P (.paginated Hating) S (print listing only) 

M (memory Image) L (delete line mmbera) T (print symbol table) 

DEBOG-XX (XX la vera^R (nppber created by DEBBG-GEN) DEBUG utility 

DEBUG-GEN DEBUG Generation utility 

LINBKDIT MDOS Lina Editor 

((unit) ! ISYMSAVE "kf ilenasm)* (;"<pis^ atsring)") Create EQUatae from Symbol Table 

(<unit>i ifiiaeopy *tkunit>tl«ftil«EEE)t>" ’((unit)) (>) [<newfilenama>l * Copy Pile 

(kunit) :]COPTFHJE " (kunit) Gppy file to earn* drive but different disk 
diskcopy copy disk from one driv 


IDCIITHini 


CLEAR 

NAME 4 k filename)* 

Flas 

AUTo (number) 

PROMPT "(meamage)* 

LOAD *(<unit>rp)!<fiieiwn»e>" 

APPEND " [(unit) ; )kf ilename)? Go neat 

SAVE (kunit) ) 

RHSAVK (kunit) ) 

LIST (klinemtabar IV) (kllnenumber 2>] 

LISTP (Clinenisabei t>.) cKHnemmbgr 2>] Ou 

PRINT (klinenumber 1)l'!(<linanumber 2)1 
PRINT** (((linenumberl)] (klinenumber 2*1 Outp 

TAB ( top code eol>) ((operand qol>) ( (Comment ool>) 
DEl/T kllnennber 1) (kllnenumber 2> ) 

REHUM ((starting no.)) ((increment)) ((start line)] 
SEARCH [kllnenumber 1>) '(Cllnemmber 2>J 
SEARCHALL (kllnenumber 1>) (klinenusber 2)J 
CHANGE (klinenumber 1>) [klinemmiber 2)] 

CHAMGEALL (klinenumber I)] (klinenumber 2>] 

EDIT klinenumber) 

(SPACE) 

Cknew character) Change the 

D 


Clear file text from memory 
Name the current text film 
-Display all file parameters 
Bet the auto linenueber increment 
Change the prompt string 
Load a text file into memory 
Concatenate a file to the existing file 
Save the current file on diak 
Save an old file on disk 
Output a formatted display 
Output formatted display to printer 
CXAput unformatted display 
Output unformatted displey r <to -(printer 
mment ool>l Set tabs for formatted output 
Oelete lines from fils 
itart line)] Renusbar file lines 

Invoke search node using mask 
2)] Search comment lines also 

Global ssarah and raplacs 
2>] As above including comments 

Enter edit commend mode 
Advance the edit pointer 
Change the next oharaoter in the edit buffer 
Delete the next character 


Knew characters) 
L 

Skcharaoter) 

K (character) 
(RETURN) 

a 


Insert new characters into the line 
Lfs£ the line in the special editing buffer 
Search to a specified character 
Delete to e specified character 
Replace line in file and exit edit node 
Quit the edit noda> leave original line imohenged 
Exit frt* the line editor and return to MOOS 


ORG Set the value of the assembler ptogrmi counter to the value of the operand 
LINK •’ (source file) 1 Permits additional source files tx> be- linked from the disk 
END ((execution address)) Identifies the physical end of the source file 
BQU (value) Equates a literal value to the line's label 
REQ [‘(prompt)') Inputs a numeric argument from the console keyboard 
PUT ( • (text) *),( (expression) ),.. . Displays given information on console 
TAB (kop code ool>) ((operand col>] ((comment col)) Set tabs for formatted output 
NLIST Suppressee the listing of the assembly from here on 
LIST Enable listing to the printer as it i s encountered 
FORM Produce a form feed in the listing when encountered 
DB kbyte), (kbyte)] , . .. Define storage with operands evaluating to one byte 
Z Same as DB 0 
OH (word) , f (word) ],.. . Define storage byte pairs in low/high sequence 
DD kwopij),... As above except in high/low sequence 
DT kkhiixt!)' Define a line of text containing any ASCII literal characters 
DTZ '' kiexfc) ' Define a line of text as above except terminated in zero 
•DTH ’'(text)' As OT exoapt the last byte is ORed with 80H 
pS (expression evaluating to 16 bits) Reserve storage for arbitrary number of bytes 
FILL <9 bit expression), (8 bit exp.) Fill locations with the second argument 
IFF (Operand) Conditional assembly of a block of code If the argument is zero 
IPT (operand) Same as above except if the argument is nonzero 
ffifiSE Define the end of a conditional assembly block (can be nested) 


A Argument error 
L Label error 
R 'Register error 
V Vel&fe error 


0 DufKioate label 
H Missing .label error 
S Syntax error 


J Jump relative error 
O Opcode error 
U Undefined symbol error 


+ Arl^liipetXc sum 
/ Integer quotient 

I Bitwise logical OR 






- Arithmetic di f f^rence * 
% Integer remainder C 
ft Bitvis* logical BXCUISIVB-OR 


* Arithmetic product 
t Bitwise logical AND 


U31 m IriiLl 


00-03 m( 3©S (. BASIC data files 

04- 07 'Editor/Assembler source files 

05- 0B Assembler object & BASIC "save memory* files 
0C-*0F- Executable overlay files 

10*11 BASIC program ‘files Protect Status (LS 2 bits) : 

1 7 Executable system files 0-Read/Write File 

18-4E Executable user pSles 1-Read Only File 

■1C-7P Reserved for future expansion 2-Perma>nent Read/Wri te File 

80- FF Available for user definition 3-Pamtanent Read Only File 


COMP (DUMP) SWTR) FILL] MOVE) SEAR, StARNl MAE*? EttWC 
LIST '(start addr.) (end addr.) 

;BIRR 

< re git* ter name) (hex value* 


Same as in MOOS Executive 
List in instruction mnemonics 
Display processor state 
Set vslue of register 


REGISTER NAMES* A, B, C, D, E, H, L, BC, BE, HL, SP, PC, «SP (top of stack) 


FEi ms? PCilfNCj FP) FHi FPE) rpO| FHi FHH Set or reset processor flag 
ROT (vector number) Change restart vector 
SET (breakpoint number) (address) Define a permanent breakpoint 
DIS8 Display all current breakpoint* 
OLR ((breakpoint number)) " Clear one or all breakpoint! 
EXEC .(start addr.) Execute program but return to DEBUG when breakpoint is reachak 
REPT (breakpt . number) (repeat count) Execute until breakpt. is hit (count) timei 
COOT f(break1>((break2>I<breek3)((break4))l ] ) Execute S display state at up to 4 pti 
ROT Execute c. display atate at breakpt. on top of stacl 
(SPACE) Execute next instruction only, and display proc. st«t< 
TRACE Execute program and display proc . state after each intruetioi 


